(display-message-or-buffer): Pass the correct buffer to `display-buffer'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c021cee952f70f412548d7ebab8b9b9767a49f24..a77f5728ab52fe0e55406b7caf13a41440692c49 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-10-15  Miles Bader  <miles@gnu.org>
+
+       * simple.el (display-message-or-buffer): Pass the correct buffer
+       to `display-buffer'.
+
 2001-10-14  Stefan Monnier  <monnier@cs.yale.edu>
 
        * progmodes/executable.el (executable-binary-suffixes): Make varalias.

diff --git a/lisp/simple.el b/lisp/simple.el
index b80a2bdf273ac30052dd3b28faf28fb6ef5ef141..deb1737f4f9f84a3898b637256820783a5aa9e56 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1305,7 +1305,8 @@ and only used if a buffer is displayed."
                   (t
                    ;; Buffer
                    (goto-char (point-min))
-                   (display-buffer message not-this-window frame))))))))
+                   (display-buffer (current-buffer)
+                                   not-this-window frame))))))))
 
 
 ;; We have a sentinel to prevent insertion of a termination message